home *** CD-ROM | disk | FTP | other *** search
/ Komputer for Alle 1998 #13 / Skiva nr 13-1998 (Svart).iso / K-CN.dxr / Maanedlig_102.ls < prev    next >
Encoding:
Text File  |  1998-11-04  |  278 b   |  12 lines
  1. on mouseDown
  2.   puppetSound(3, "Knap")
  3. end
  4.  
  5. on mouseUp
  6.   set result to baReadRegString("software\microsoft\DirectX", "Version", EMPTY, "HKEY_LOCAL_MACHINE")
  7.   if not (result contains "6.00") then
  8.     go("S2Chicken")
  9.   end if
  10.   baRunProgram("Montezum\Setup.exe", "normal", 0)
  11. end
  12.